home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2000 October
/
CHIP Turkiye Ekim 2000.iso
/
prog
/
share
/
39
/
_SETUP.1
/
Qimage.exe
/
0
/
RCDATA
/
TTHUMBFORM
/
TTHUMBFORM.txt
< prev
Wrap
Text File
|
2000-07-30
|
16KB
|
474 lines
object ThumbForm: TThumbForm
Left = 350
Top = 185
BorderStyle = bsDialog
Caption = 'Image pre-viewer'
ClientHeight = 373
ClientWidth = 580
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 14
object Panel1: TPanel
Left = 0
Top = 0
Width = 580
Height = 373
Align = alClient
TabOrder = 0
object StopBtn: TSpeedButton
Left = 499
Top = 288
Width = 75
Height = 30
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777700007777711111111177777700007777199999999917777700007771
9999999999917777000077199999999999991777000071999999999999999177
000019999999999999999917000019FFF99F99FFF9F9991700001999F99F99F9
F9F99917000019FFF99F99F9F9FFF917000019F9999F99F9F9F9F917000019FF
F9FFF9FFF9FFF917000019999999999999999917000019999999999999999917
0000719999999999999991770000771999999999999917770000777199999999
9991777700007777199999999917777700007777711111111177777700007777
77777777777777770000}
Visible = False
OnClick = AbortBtnClick
end
object Image1: TImage
Left = 519
Top = 140
Width = 35
Height = 33
Center = True
Picture.Data = {<image000.bmp>}
Stretch = True
OnDragDrop = Image1DragDrop
OnDragOver = Image1DragOver
end
object Thumbs: TStringGrid
Left = 168
Top = 47
Width = 324
Height = 301
DefaultColWidth = 60
DefaultRowHeight = 50
FixedCols = 0
RowCount = 10
FixedRows = 0
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -9
Font.Name = 'Arial'
Font.Style = []
Options = [goVertLine, goHorzLine]
ParentColor = True
ParentFont = False
ScrollBars = ssVertical
TabOrder = 0
OnClick = ThumbsClick
OnDblClick = ThumbsDblClick
OnDragDrop = ThumbsDragDrop
OnDragOver = ThumbsDragOver
OnDrawCell = ThumbsDrawCell
OnKeyDown = ThumbsKeyDown
OnMouseDown = ThumbsMouseDown
OnMouseMove = ThumbsMouseMove
end
object DriveComboBox1: TDriveComboBox
Left = 7
Top = 328
Width = 157
Height = 21
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = []
ParentFont = False
TabOrder = 1
OnChange = DriveComboBox1Change
OnClick = DriveComboBox1Click
end
object DirectoryListBox1: TDirectoryListBox
Left = 8
Top = 191
Width = 155
Height = 134
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = []
ItemHeight = 16
ParentFont = False
TabOrder = 2
OnChange = DirectoryListBox1Change
OnClick = DirectoryListBox1Click
end
object FileListBox1: TFileListBox
Left = 8
Top = 47
Width = 153
Height = 141
Hint = 'Drag Image on the grid to create thumbnail'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = []
ItemHeight = 16
Mask =
'*.gif;*.jpg;*.pcx;*.bmp;*.wmf;*.ico;*.scm;*.png;*.cms;*.tif;*.pc' +
'd;*.dxf;*.tga;*.eps'
ParentFont = False
ShowGlyphs = True
TabOrder = 3
OnChange = FileListBox1Change
OnClick = FileListBox1Click
OnDblClick = FileListBox1DblClick
OnKeyDown = FileListBox1KeyDown
OnMouseDown = FileListBox1MouseDown
end
object ComboBox1: TComboBox
Left = 8
Top = 10
Width = 154
Height = 22
Color = clBtnFace
DropDownCount = 15
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -11
Font.Name = 'Times New Roman'
Font.Style = []
ItemHeight = 14
ParentFont = False
TabOrder = 4
Text = 'Select file type'
OnChange = ComboBox1Change
OnClick = ComboBox1Click
Items.Strings = (
'*.JPG;*.GIF;*.PCX;*.BMP;*.PNG;*.TIF;*.WMF;*.ICO;*.PCD'
'*.JPG'
'*.GIF'
'*.PCX'
'*.BMP'
'*.PNG'
'*.TIF'
'*.PCD'
'*.WMF'
'*.ICO')
end
object PMultiImage2: TPMultiImage
Left = 506
Top = 47
Width = 60
Height = 50
GrabHandCursor = 5
Center = True
Scrolling = True
ShowScrollbars = True
B_W_CopyFlags = [C_DEL]
Color = clBtnFace
ImageName = 'file not found'
ImageDither = True
ImageReadRes = lAutoMatic
BlitMode = sLight
ImageWriteRes = sAutoMatic
TifSaveCompress = sNONE
TiffPage = 1
TiffAppend = False
JPegSaveQuality = 25
JPegSaveSmooth = 5
RubberBandBtn = mbLeft
ScrollbarWidth = 12
ParentColor = True
TextLeft = 0
TextTop = 0
TextRotate = 0
TabOrder = 5
TabStop = False
Visible = False
ZoomBy = 10
end
object PMultiImage1: TPMultiImage
Left = 506
Top = 47
Width = 60
Height = 50
GrabHandCursor = 5
Center = True
Scrolling = True
ShowScrollbars = True
B_W_CopyFlags = [C_DEL]
Color = clBtnFace
ImageName = 'file not found'
ImageDither = True
ImageReadRes = lAutoMatic
BlitMode = sLight
ImageWriteRes = sAutoMatic
TifSaveCompress = sNONE
TiffPage = 1
TiffAppend = False
JPegSaveQuality = 25
JPegSaveSmooth = 5
RubberBandBtn = mbLeft
ScrollbarWidth = 12
ParentColor = True
Stretch = True
TextLeft = 0
TextTop = 0
TextRotate = 0
TabOrder = 6
TabStop = False
ZoomBy = 10
end
object Panel2: TPanel
Left = 1
Top = 1
Width = 578
Height = 33
Align = alTop
BevelInner = bvRaised
BevelOuter = bvNone
TabOrder = 7
object LoadBtn: TSpeedButton
Left = 1
Top = 3
Width = 28
Height = 28
Hint = 'Load all existing thumbs'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777780087777777800000000000087708800888800
880770880888888088077088087888808807708808E78880880770FF00888800
FF0770FFF000000FFF0770000000000000077700780FF0870077777777800877
7777777777777777777777777777777777777777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = LoadBtnClick
end
object CreateNewKeep: TSpeedButton
Left = 29
Top = 3
Width = 28
Height = 28
Hint = 'Create new previews keep old ones'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777777777777777777800000008777777707777777077007770788F8870
008077707777777080807770777887707070777078800870F070777080088070
00F0007008877070770008088770000877770F07700777777777007007777777
7777777777777777777777777777777777777777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = IncAllKeepBtnClick
end
object CreateNewDelete: TSpeedButton
Left = 57
Top = 3
Width = 28
Height = 28
Hint = 'Create new previews and delete old ones'
Flat = True
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777700000007000000000000000700000007077770770770770700000007007
7077077077007000000070707777770770707000000070770770707707707000
0000707770770700777070000000707777007777777070000000707777777777
7770700000007077777777700770700000007077777777077070700000007077
7777770770707000000070777777777007707000000070777777777777707000
0000700000000000000070000000777777777777777770000000777777777777
777770000000}
ParentShowHint = False
ShowHint = True
OnClick = CreateNewDeleteClick
end
object DeleteAllBtn: TSpeedButton
Left = 85
Top = 3
Width = 28
Height = 28
Hint = 'Delete all previews'
Flat = True
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
777770000000777777777777777770000000777777777777770F700000007777
0F777777777770000000777000F7777770F770000000777000F777770F777000
00007777000F77700F777000000077777000F700F7777000000077777700000F
7777700000007777777000F777777000000077777700000F7777700000007777
7000F70F7777700000007770000F77700F7770000000770000F7777700F77000
00007700F7777777700F70000000777777777777777770000000777777777777
777770000000}
ParentShowHint = False
ShowHint = True
OnClick = DeleteAllBtnClick
end
object ClearAllBtn: TSpeedButton
Left = 113
Top = 3
Width = 28
Height = 28
Hint = 'Clear preview window'
Flat = True
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777700000007777777777177777700000007777777771177777100000007777
7777711177717000000077777777771177117000000070000000000011577000
0000707777777775117770000000707007007071511770000000707777777711
771150000000704444445144447510000000774FFFFF15FFF47770000000774F
00F00F00F47770000000774FFFFFFFFFF4777000000077444444444444777000
0000774744744744747770000000774444444444447770000000777777777777
777770000000}
ParentShowHint = False
ShowHint = True
OnClick = ClearAllBtnClick
end
object Autoload: TSpeedButton
Left = 141
Top = 3
Width = 28
Height = 28
Hint = 'Autoload Previews'
AllowAllUp = True
GroupIndex = 11
Flat = True
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
0400000000002001000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333330000333333333333333333328888033333383333333
3332222288033338888333333332222228033303833833333332262228033000
0338333333322A62220333033038333333332222283333333038333333333222
2333333330333333333333333333333330333333883333333333333333333338
8883333333333888888833880888333333333888888838805088833333380000
00883309150883388888C44440883099915033333078CC4440883DD999153000
0003C6C4408833DF998333333033CE6C4088333DD83333333333CCCCC0333333
D333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
ParentShowHint = False
ShowHint = True
end
object GPall: TSpeedButton
Left = 170
Top = 2
Width = 29
Height = 29
Hint = 'In 256 color mode use a shared palette'
AllowAllUp = True
GroupIndex = 12
Flat = True
Glyph.Data = {
CA010000424DCA01000000000000760000002800000024000000110000000100
0400000000005401000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777770000777777777777777777777777777777777777
000077993344DDBBEE7777778877887788777777000077993344DDBBEE777777
8877887788777777000077993344DDBBEE777777887788778877777700007799
3344DDBBEE7777778877887788777777000077993344DDBBEE77777788778877
88777777000077993344DDBBEE7777778877887788777777000077993344DDBB
EE7777778877887788777777000077993344DDBBEE7777778877887788777777
000077993344DDBBEE7777778877887788777777000077993344DDBBEE777777
8877887788777777000077993344DDBBEE777777887788778877777700007799
3344DDBBEE7777778877887788777777000077993344DDBBEE77777788778877
88777777000077993344DDBBEE77777788778877887777770000777777777777
7777777777777777777777770000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
end
object RSpeed: TComboBox
Left = 209
Top = 5
Width = 169
Height = 22
Style = csDropDownList
ItemHeight = 14
TabOrder = 0
Items.Strings = (
'Optimize Previews for Speed'
'Optimize Previews for Size')
end
object CResolution: TComboBox
Left = 386
Top = 5
Width = 174
Height = 22
Style = csDropDownList
ItemHeight = 14
TabOrder = 1
Items.Strings = (
'Use 16 system colors resolution'
'Use 256 colors resolution'
'Use true color resolution'
'Use Automatic color resolution')
end
end
object StatusBar1: TStatusBar
Left = 1
Top = 353
Width = 578
Height = 19
Panels = <
item
Width = 350
end
item
Width = 50
end>
SimplePanel = False
object Gauge1: TProgressBar
Left = 352
Top = 3
Width = 233
Height = 16
Min = 0
Max = 100
TabOrder = 0
end
end
object CloseBtn: TBitBtn
Left = 499
Top = 319
Width = 75
Height = 30
Caption = 'Close'
TabOrder = 9
OnClick = CancelBtnClick
end
end
end